// .txt

beginzonescript;

variables;

short crime_tolerance = 3;
short last_abil;
short i;

body;

beginstate INIT_STATE;


	add_range_to_group(10,17,1);
	add_range_to_group(18,25,2);
	set_aggression(1001,9);
	set_aggression(1002,9);
	change_max_health(1001,70);
	change_max_health(1002,70);
	
	add_range_to_group(29,33,3);
	set_aggression(1003,9);
	
	set_name(50,"Enchantress Sasa");
	set_level(50,26);
	set_boss_level(50,1);
	set_new_abil(50,3);

	set_name(52,"Flametongue");
	set_boss_level(52,1);
	set_name(53,"Stomper");
	set_boss_level(53,1);
	set_name(54,"Basher");
	set_boss_level(54,1);
	
	if (get_sdf(23,3) > 0) {
		make_zone_hostile();
		}

	last_abil = get_current_tick();
	
	set_crime_tolerance(crime_tolerance);
	break;

beginstate EXIT_STATE;

break;

beginstate START_STATE;
	// clear zone?
	if ((zone_clear(ME) == FALSE) && (get_flag(23,4) > 7)) {
		print_str_color("You have killed enough rogues to be able to pass this",2);
		print_str_color("  area safely.",2);
		clear_zone(ME);	
		}
		
	if ((get_crime_level() >= crime_tolerance) && (get_sdf(23,3) == 0)) {
		make_zone_hostile();
		set_flag(23,3,1);
		}

	 if (gf(23,3) == 0) {
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(50,"I'm busy.");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(50,"Speak your piece.");
		if (get_ran(1,0,100) < 10)
			give_char_text_bubble(50,"You need pods?");
		if (gf(23,8) == 0) {
			if (get_ran(1,0,100) < 25)
				give_char_text_bubble(51,"Stay out.");
			if (get_ran(1,0,100) < 25)
				give_char_text_bubble(51,"Enter and die.");
			}
		}
	
	if (((is_combat()) && (tick_difference(last_abil,get_current_tick()) > 0)) || ((is_group()) && (tick_difference(last_abil,get_current_tick()) > 5))) {
		last_abil = get_current_tick();

		if ((gf(23,7) > 0) && (gf(23,7) < 100)) {
			if (gf(23,7) == 4) {
				print_str_color("More clawbugs emerge from their holes!",2);
				activate_hidden_group(2);
				}
			if (gf(23,7) == 6) {
				print_str_color("More clawbugs emerge from their holes!",2);
				activate_hidden_group(3);
				}
			if (gf(23,7) == 8) {
				print_str_color("The last two clawbugs emerge from their holes. They are huge!",2);
				activate_hidden_group(4);
				set_level(48,12);
				set_boss_level(48,2);
				set_name(48,"Rampaging Clawbug");
				set_level(49,12);
				set_boss_level(49,2);
				set_name(49,"Rampaging Clawbug");
				}
			inc_flag(23,7,1);
				
				
			}
		}
break;

beginstate 10;
	sf(23,1,1);
break;

beginstate 11;
	sf(23,2,1);
break;

beginstate 12;
	if (gf(23,5) == 0) {
		sf(23,5,1);
		set_terrain_string_range("You start to hear clicking and hissing. It comes from the piles of rubble around you.",3);
		}
break;

beginstate 13;
	if (gf(23,6) == 0) {
		sf(23,6,1);
		sf(23,7,1);
		activate_hidden_group(1);
		begin_talk_mode(3);
		}
break;


beginstate 14;
	if ((char_ok(51)) && (get_attitude(51) < 10) && (gf(23,8) == 0)) {
		sf(23,3,1);
		make_zone_hostile();
		begin_talk_mode(5);
		
		}
break;

//	print_str("");
//	set_terrain_string_range(".",3);
//	set_terrain_string_range("The sign says - .",3);
